home *** CD-ROM | disk | FTP | other *** search
/ MacGames Sampler / PHT MacGames Bundle.iso / MacSource Folder / Samples from the CD / Assembly / ProTracker Source / SRC / ptdecompacter.s < prev    next >
Encoding:
Text File  |  1993-08-29  |  293 b   |  21 lines  |  [TEXT/KAHL]
  1. ;--------------- PTDecompacter ----------------
  2.  
  3. Decompact
  4.     MOVE.B    (A0)+,D1
  5.     CMP.B    #181,D1
  6.     BEQ.s    DecodeIt
  7.     MOVE.B    D1,(A1)+
  8. decom2    SUBQ.L    #1,D0
  9.     BNE.s    Decompact
  10.     RTS
  11.  
  12. DecodeIt
  13.     MOVEQ    #0,D1
  14.     MOVE.B    (A0)+,D1
  15.     MOVE.B    (A0)+,D2
  16. dcdloop    MOVE.B    D2,(A1)+
  17.     DBRA    D1,dcdloop
  18.     SUBQ.L    #2,D0
  19.     BRA.s    decom2
  20.  
  21.